home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d12 / v10n22.arc / CURDR.PRG < prev    next >
Text File  |  1991-12-08  |  375b  |  13 lines

  1. ***********************************************************************
  2. * CURDRIVE.PRG                              Demo use of CURDRIVE.BIN
  3. * Author..: Sal Ricciardi
  4. ***********************************************************************
  5. cdrive=' '
  6. LOAD curdrive
  7. CALL curdrive WITH cdrive
  8. RELEASE MODULE curdrive
  9. ?
  10. ? 'The current drive is '+cdrive+':'
  11. ?
  12. RETURN
  13.